function create_101_P(P_aero_up,P_aero_down,aero_up_con,aero_down_con,aerobox)
fpressure=fopen('pressure.bdf','w');
fload=fopen('load.bdf','w');
fprintf(fload,'%8s%8d%8s','LOAD',2,'1.0');
j=1;
for i=1:size(aerobox,1)
    if j==4
        fprintf(fload,'\n        ');
        j=0;
    end
    if ismember(aerobox(i,1),aero_up_con(:,1))
        p=P_aero_up(aero_up_con(:,1)==aerobox(i,1));
        if p<99
            fprintf(fpressure,'%8s%8d%8d%8.5f%24s%8d%8d\n','PLOAD4',100000+i,aerobox(i,1)+200000,p,'',aerobox(i,2)+200000,aerobox(i,10)+200000);
        else
            fprintf(fpressure,'%8s%8d%8d%8.2e%24s%8d%8d\n','PLOAD4',100000+i,aerobox(i,1)+200000,p,'',aerobox(i,2)+200000,aerobox(i,10)+200000);
        end
        fprintf(fload,'%8s%8d','1.0',100000+i);
    else
        p=P_aero_down(aero_down_con(:,1)==aerobox(i,1));
        if p<99
            fprintf(fpressure,'%8s%8d%8d%8.5f%24s%8d%8d\n','PLOAD4',200000+i,aerobox(i,1)+200000,p,'',aerobox(i,2)+400000,aerobox(i,10)+400000);
        else
            fprintf(fpressure,'%8s%8d%8d%8.2e%24s%8d%8d\n','PLOAD4',200000+i,aerobox(i,1)+200000,p,'',aerobox(i,2)+400000,aerobox(i,10)+400000);
        end
        fprintf(fload,'%8s%8d','1.0',200000+i);
    end
    j=j+1;
end
fclose(fpressure);
fclose(fload);
end